home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1993 July / InfoMagic USENET CD-ROM July 1993.ISO / sources / unix / volume13 / ease.pch < prev    next >
Encoding:
Internet Message Format  |  1988-01-31  |  50.0 KB
  1. Subject:  v13i029:  Patches to EASE sendmail.cf language
  2. Newsgroups: comp.sources.unix
  3. Sender: sources
  4. Approved: rsalz@uunet.UU.NET
  5.  
  6. Submitted-by: "Arnold D. Robbins" <emory!arnold>
  7. Posting-number: Volume 13, Issue 29
  8. Archive-name: ease.pch
  9.  
  10. [  Ease is a language developed at Purdue that is a more friendly way of
  11.    writing sendmail.cf files.  A description was published in the Usenix
  12.    newsletter ;login: and the source was published in Volume 10 of this
  13.    newsgroup back in July1987 or so.  --r$ ]
  14.  
  15. Rich,
  16.     Enclosed please find a set of context diffs to 'ease'. These are
  17. relative to your most recent posting of ease, in July of this year.
  18.  
  19.     The README.new at the front describes the new features; there weren't
  20. a huge number of changes, but they make a difference in usability.
  21.  
  22. I hope the ease user community finds these helpful.
  23.  
  24. Arnold Robbins
  25. ARPA, CSNET:    arnold@emory.ARPA    BITNET: arnold@emory
  26. UUCP: { decvax, gatech, }!emory!arnold    DOMAIN: arnold@emory.edu (soon)
  27.  
  28. #! /bin/sh
  29. # This is a shell archive, meaning:
  30. # 1. Remove everything above the #! /bin/sh line.
  31. # 2. Save the resulting text in a file.
  32. # 3. Execute the file with /bin/sh (not csh) to create the files:
  33. #    README.new
  34. #    doc.diffs
  35. #    src.diffs
  36. #    local.shar
  37. export PATH; PATH=/bin:$PATH
  38. echo shar: extracting "'README.new'" '(1849 characters)'
  39. if test -f 'README.new'
  40. then
  41.     echo shar: will not over-write existing file "'README.new'"
  42. else
  43. cat << \Howard_The_Duck > 'README.new'
  44. README.new - Wed Dec 23 12:16:22 EST 1987
  45.  
  46. There are four files in this shar archive.
  47.  
  48. README.new    -- this file
  49. doc.diffs    -- diffs to the ease documentation
  50. local.shar    -- shell scripts and man page for running cpp and ease.
  51. src.diffs    -- diffs to the ease source
  52.  
  53. This posting provides a number of enhancements to the 'ease' language for
  54. writing sendmail configuration files. The diffs are relative to the
  55. last posting of ease to comp.sources.unix. They are set up in such a
  56. fashion that if used with the 'patch' utility, the several totally new files
  57. will be created automatically.
  58.  
  59. The enhancements provided and their authors are as follows:
  60.  
  61.     From Stephen Schaefer at BGSU:
  62.     + Ease will now echo its input to its output as sendmail
  63.       comments.  A simple sed script can recover either the
  64.       original ease or just the sendmail configuration.
  65.  
  66.     From Jeff Stearns at John Fluke Manufacturing Company:
  67.     + Additions to the syntax to support Sun sendmail extensions.
  68.     + Fixes to string handling routines to avoid null pointer
  69.       dereferencing problems.
  70.     + Improved flexibility in the handling of header definition lines.
  71.     + Pre-defining the class 'c_myname' for class 'w'.
  72.     + Miscellanious small bug fixes.
  73.  
  74.     From Arnold Robbins at Emory University:
  75.     + Support for new options and mailer flags in the 4.3 sendmail.
  76.     + Addition of the keyword "while", equivalent to "if".
  77.     + Modified the "canon" facility to accept more useful arguments.
  78.     + Grammar fixes to the Fluke changes to remove reduce/reduce conflicts.
  79.     + Miscellanious small bug fixes.
  80.  
  81. The new features and changes have all been documented in the ease manual.
  82.  
  83. In addition. local.shar contains 'sh' and 'ksh' scripts for collecting
  84. input and output files, and cpp options, and putting it all together to
  85. run ease, as well as a simple man page.
  86.  
  87. Arnold Robbins
  88. Emory University Computing Center
  89. Howard_The_Duck
  90. fi # end of overwriting check
  91. echo shar: extracting "'doc.diffs'" '(13697 characters)'
  92. if test -f 'doc.diffs'
  93. then
  94.     echo shar: will not over-write existing file "'doc.diffs'"
  95. else
  96. cat << \Howard_The_Duck > 'doc.diffs'
  97. diff -cr doc/Makefile /usr/src/local/local.bin/ease/doc/Makefile
  98. *** doc/Makefile    Thu Aug 13 12:07:05 1987
  99. --- /usr/src/local/local.bin/ease/doc/Makefile    Wed Dec 23 11:30:35 1987
  100. ***************
  101. *** 1,10 ****
  102.   #
  103.   #    Makefile for Ease document.
  104.   #
  105.   #    James S. Schoner
  106.   #    Purdue University Computing Center
  107.   #
  108. ! all:    cover mainbody apen1 apen2 apen3
  109.       
  110.   cover: FRC
  111.       troff -ms cover
  112. --- 1,21 ----
  113.   #
  114. + # $Header: Makefile,v 1.2 87/12/23 11:30:27 root Locked $
  115. + #
  116. + # $Log:    Makefile,v $
  117. + # Revision 1.2  87/12/23  11:30:27  root
  118. + # Added new appendix. ADR.
  119. + # 
  120. + # Revision 1.1  87/12/23  10:40:45  root
  121. + # Initial revision
  122. + # 
  123. + #
  124. + #
  125.   #    Makefile for Ease document.
  126.   #
  127.   #    James S. Schoner
  128.   #    Purdue University Computing Center
  129.   #
  130. ! all:    cover mainbody apen1 apen2 apen3 apen4
  131.       
  132.   cover: FRC
  133.       troff -ms cover
  134. ***************
  135. *** 20,25 ****
  136. --- 31,39 ----
  137.   
  138.   apen3:
  139.       tbl ap3 | troff -ms
  140. + 
  141. + apen4:
  142. +     tbl ap4 | troff -ms
  143.   
  144.   FRC:
  145.   
  146. diff -cr doc/ap1 /usr/src/local/local.bin/ease/doc/ap1
  147. *** doc/ap1    Thu Aug 13 12:07:06 1987
  148. --- /usr/src/local/local.bin/ease/doc/ap1    Thu Jan 21 15:33:47 1988
  149. ***************
  150. *** 37,42 ****
  151.   \fIm_rhdir\fR    z    The home directory of the recipient
  152.   .TE
  153.   .FS
  154. ! *  Taken from pages 15 and 16 of the Installation and Operation Guide
  155. ! for Sendmail (UNIX Programmer's Manual, Volume 2c), by Eric Allman.
  156.   .FE
  157. --- 37,42 ----
  158.   \fIm_rhdir\fR    z    The home directory of the recipient
  159.   .TE
  160.   .FS
  161. ! *  Taken from pages 19 and 20 of the Sendmail Installation and Operation Guide
  162. ! (SMM:7 in the 4.3 BSD UNIX System Manager's Manual), by Eric Allman.
  163.   .FE
  164. diff -cr doc/ap2 /usr/src/local/local.bin/ease/doc/ap2
  165. *** doc/ap2    Thu Aug 13 12:07:08 1987
  166. --- /usr/src/local/local.bin/ease/doc/ap2    Thu Jan 21 17:10:56 1988
  167. ***************
  168. *** 1,3 ****
  169. --- 1,20 ----
  170. + ...
  171. + ... $Header: ap2,v 1.4 88/01/21 17:10:33 root Locked $
  172. + ... 
  173. + ... $Log:    ap2,v $
  174. + ... Revision 1.4  88/01/21  17:10:33  root
  175. + ... Added new option; change location of Sendmail doc to 4.3 SMM. ADR.
  176. + ... 
  177. + ... Revision 1.3  87/09/04  14:55:36  root
  178. + ... Fixed typo in new options. ADR.
  179. + ... 
  180. + ... Revision 1.2  87/03/03  17:05:41  root
  181. + ... Changes for 4.3 version of sendmail. ADR.
  182. + ... 
  183. + ... Revision 1.1  87/03/03  17:01:24  root
  184. + ... Initial revision
  185. + ... 
  186. + ...
  187.   .DS C
  188.   \s+5\fBAppendix B\fR
  189.   
  190. ***************
  191. *** 7,14 ****
  192.   .sp 2
  193.   .PP
  194.   For a complete description of Sendmail's options and their values, refer to 
  195. ! Appendix B of the Installation and Operation Guide for Sendmail (UNIX
  196. ! Programmer's Manual, Volume 2c), by Eric Allman.
  197.   .sp 2
  198.   .TS 
  199.   center box;
  200. --- 24,31 ----
  201.   .sp 2
  202.   .PP
  203.   For a complete description of Sendmail's options and their values, refer to 
  204. ! Appendix B of the Sendmail Installation and Operation Guide (SMM:7 in the
  205. ! 4.3 BSD UNIX System Managers's Manual), by Eric Allman.
  206.   .sp 2
  207.   .TS 
  208.   center box;
  209. ***************
  210. *** 41,46 ****
  211. --- 58,64 ----
  212.   \fIo_dnet\fR    N    
  213.   \fIo_hformat\fR    o    
  214.   \fIo_qdir\fR    Q    
  215. + \fIo_qfactor\fR    q
  216.   \fIo_tread\fR    r    
  217.   \fIo_flog\fR    S    
  218.   \fIo_safe\fR    s    
  219. ***************
  220. *** 51,54 ****
  221. --- 69,76 ----
  222.   \fIo_wizpass\fR    W    
  223.   \fIo_loadq\fR    x    
  224.   \fIo_loadnc\fR    X    
  225. + \fIo_recipfactor\fR    y
  226. + \fIo_newproc\fR    Y
  227. + \fIo_prifactor\fR    z
  228. + \fIo_waitfactor\fR    Z
  229.   .TE
  230. diff -cr doc/ap3 /usr/src/local/local.bin/ease/doc/ap3
  231. *** doc/ap3    Thu Aug 13 12:07:10 1987
  232. --- /usr/src/local/local.bin/ease/doc/ap3    Thu Jan 21 17:11:11 1988
  233. ***************
  234. *** 1,3 ****
  235. --- 1,17 ----
  236. + ...
  237. + ... $Header: ap3,v 1.3 88/01/21 17:10:57 root Locked $
  238. + ... 
  239. + ... $Log:    ap3,v $
  240. + ... Revision 1.3  88/01/21  17:10:57  root
  241. + ... Changed location of Sendmail doc to 4.3 SMM. ADR.
  242. + ... 
  243. + ... Revision 1.2  87/03/03  17:05:53  root
  244. + ... Changes for 4.3 version of sendmail. ADR.
  245. + ... 
  246. + ... Revision 1.1  87/03/03  17:04:52  root
  247. + ... Initial revision
  248. + ... 
  249. + ...
  250.   .DS C
  251.   \s+5\fBAppendix C\fR
  252.   
  253. ***************
  254. *** 7,14 ****
  255.   .sp 5
  256.   .PP
  257.   For a complete description of mailer flags, refer to 
  258. ! Appendix C of the Installation and Operation Guide for Sendmail (UNIX
  259. ! Programmer's Manual, Volume 2c), by Eric Allman.
  260.   .sp 5
  261.   .TS 
  262.   center box;
  263. --- 21,28 ----
  264.   .sp 5
  265.   .PP
  266.   For a complete description of mailer flags, refer to 
  267. ! Appendix C of the Sendmail Installation and Operation Guide (SMM:7 in the
  268. ! 4.3 BSD UNIX System Manager's Manual), by Eric Allman.
  269.   .sp 5
  270.   .TS 
  271.   center box;
  272. ***************
  273. *** 38,41 ****
  274. --- 52,56 ----
  275.   \fIf_retsmtp\fR    p    
  276.   \fIf_smtp\fR    I    
  277.   \fIf_addrw\fR    C    
  278. + \fIf_escape\fR    E
  279.   .TE
  280. diff -cr doc/cover /usr/src/local/local.bin/ease/doc/cover
  281. *** doc/cover    Thu Aug 13 12:07:11 1987
  282. --- /usr/src/local/local.bin/ease/doc/cover    Wed Dec 23 11:30:46 1987
  283. ***************
  284. *** 1,3 ****
  285. --- 1,14 ----
  286. + ...
  287. + ... $Header: cover,v 1.2 87/12/23 11:30:36 root Locked $
  288. + ...
  289. + ... $Log:    cover,v $
  290. + ... Revision 1.2  87/12/23  11:30:36  root
  291. + ... Updated list of authors. ADR.
  292. + ... 
  293. + ... Revision 1.1  87/12/23  10:16:35  root
  294. + ... Initial revision
  295. + ... 
  296. + ...
  297.   .DA
  298.   .sp 15
  299.   .nr PS 14
  300. ***************
  301. *** 19,25 ****
  302.     
  303.   for Sendmail
  304.   .DE
  305. ! .sp 13
  306.   .nr PS 14
  307.   .ps 14
  308.   .DS C
  309. --- 30,36 ----
  310.     
  311.   for Sendmail
  312.   .DE
  313. ! .sp 8
  314.   .nr PS 14
  315.   .ps 14
  316.   .DS C
  317. ***************
  318. *** 27,30 ****
  319. --- 38,49 ----
  320.   
  321.   \fIJames S. Schoner\fR
  322.   \fIPurdue University Computing Center\fR
  323. + 
  324. + Amended by
  325. + 
  326. + \fIJeff P. Stearns\fR
  327. + \fIJohn Fluke Manufacturing Company\fR
  328. + 
  329. + \fIArnold D. Robbins\fR
  330. + \fIEmory University Computing Center\fR
  331.   .DE
  332. diff -cr doc/ease.paper /usr/src/local/local.bin/ease/doc/ease.paper
  333. *** doc/ease.paper    Thu Aug 13 12:08:37 1987
  334. --- /usr/src/local/local.bin/ease/doc/ease.paper    Thu Jan 21 17:19:52 1988
  335. ***************
  336. *** 1,3 ****
  337. --- 1,24 ----
  338. + ...
  339. + ... $Header: ease.paper,v 1.5 88/01/21 17:19:35 root Locked $
  340. + ... 
  341. + ... $Log:    ease.paper,v $
  342. + ... Revision 1.5  88/01/21  17:19:35  root
  343. + ... Several editorial changes. ADR.
  344. + ... 
  345. + ... Revision 1.4  87/12/23  11:30:47  root
  346. + ... Updated list of authors. Documented extended canon() capability.
  347. + ... Integrated fluke changes in a little better. ADR.
  348. + ... 
  349. + ... Revision 1.3  87/11/04  11:33:45  root
  350. + ... Documented new keyword "while" which is equivalent to "if". ADR.
  351. + ... 
  352. + ... Revision 1.2  87/08/13  17:08:05  root
  353. + ... Changes from Jeff Stearns, fluke!jeff, for Sun. ADR.
  354. + ... 
  355. + ... Revision 1.1  87/08/13  17:05:00  root
  356. + ... Initial revision
  357. + ... 
  358. + ...
  359.   .LP
  360.   .TL
  361.   Ease: A Configuration Language
  362. ***************
  363. *** 7,12 ****
  364. --- 28,43 ----
  365.   .AI
  366.   Purdue University Computing Center
  367.   West Lafayette, Indiana  47907
  368. + .AU
  369. + Jeff P. Stearns
  370. + .AI
  371. + John Fluke Manufacturing Company
  372. + Everett, Washington  98206
  373. + .AU
  374. + Arnold D. Robbins
  375. + .AI
  376. + Emory University Computing Center
  377. + Atlanta, Georgia  30322
  378.   .sp 2
  379.   .I
  380.   .ce
  381. ***************
  382. *** 47,53 ****
  383.   the most needed improvement.  Nevertheless, every element of a configuration 
  384.   file is structurally enhanced through the use of \fBEase\fR. 
  385.   .FS
  386. ! *  UNIX is a trademark of AT&T Bell Laboratories.
  387.   .FE
  388.   .sp 2
  389.   .NH
  390. --- 78,84 ----
  391.   the most needed improvement.  Nevertheless, every element of a configuration 
  392.   file is structurally enhanced through the use of \fBEase\fR. 
  393.   .FS
  394. ! *  UNIX is a registered trademark of AT&T.
  395.   .FE
  396.   .sp 2
  397.   .NH
  398. ***************
  399. *** 107,114 ****
  400.   the special uses of
  401.   pre-defined macros, and the method of building configuration files.  To
  402.   obtain this information, the reader is advised to refer to
  403. ! the Installation and Operation Guide for Sendmail (UNIX
  404. ! Programmer's Manual, Volume 2c), by Eric Allman.\fR
  405.   .FE
  406.   .PP
  407.   At its highest level, \fBEase\fR can be viewed as a collection of 
  408. --- 138,146 ----
  409.   the special uses of
  410.   pre-defined macros, and the method of building configuration files.  To
  411.   obtain this information, the reader is advised to refer to
  412. ! the Sendmail Installation and Operation Guide (SMM:7 in the 4.3 BSD
  413. ! UNIX System Manager's Manual),
  414. ! by Eric Allman.\fR
  415.   .FE
  416.   .PP
  417.   At its highest level, \fBEase\fR can be viewed as a collection of 
  418. ***************
  419. *** 218,224 ****
  420.   .PP
  421.   last_name = "Schoner";
  422.   .PP
  423. ! whole_name = "${first_name} ${second_name}";
  424.   .sp 1
  425.   defines the macros first_name, last_name, and whole_name, where whole_name
  426.   is the string, "James Schoner".
  427. --- 250,256 ----
  428.   .PP
  429.   last_name = "Schoner";
  430.   .PP
  431. ! whole_name = "${first_name} ${last_name}";
  432.   .sp 1
  433.   defines the macros first_name, last_name, and whole_name, where whole_name
  434.   is the string, "James Schoner".
  435. ***************
  436. *** 291,297 ****
  437.   .PP
  438.   \fIo_tmode\fR = "0600" ;
  439.   .PP
  440. ! \fIo_delivery\fR = d_background ;
  441.   .sp 1
  442.   sets the options \fIo_alias\fR, \fIo_tmode\fR, and \fIo_delivery\fR.
  443.   .NH 2
  444. --- 323,329 ----
  445.   .PP
  446.   \fIo_tmode\fR = "0600" ;
  447.   .PP
  448. ! \fIo_delivery\fR = \fId_background\fR ;
  449.   .sp 1
  450.   sets the options \fIo_alias\fR, \fIo_tmode\fR, and \fIo_delivery\fR.
  451.   .NH 2
  452. ***************
  453. *** 382,390 ****
  454.   define a header,
  455.   regardless of mailer flags.  Refer to Appendix C for a list of \fBEase\fR 
  456.   identifiers representing mailer flags.  The header title is a simple
  457. ! string of characters (no macro references), whereas the \fBheader-value\fR can
  458. ! be either a string of characters (possibly containing macro references) or 
  459. ! a \fBconditional-expression\fR (discussed later).
  460.   .sp 1
  461.   The following example,
  462.   .DS
  463. --- 414,423 ----
  464.   define a header,
  465.   regardless of mailer flags.  Refer to Appendix C for a list of \fBEase\fR 
  466.   identifiers representing mailer flags.  The header title is a simple
  467. ! string of characters (no macro references), whereas the \fBheader-value\fR
  468. ! is a series of one or more strings and
  469. ! \fBconditional-expressions\fP (discussed later).
  470. ! Concatenation is implicit (as in \fIawk\fP).
  471.   .sp 1
  472.   The following example,
  473.   .DS
  474. ***************
  475. *** 495,502 ****
  476.       \fImatch\fR ( 0* )
  477.       \fImatch\fR ( 1* )
  478.       \fImatch\fR ( 1 )
  479. !     \fImatch\fR ( 1 ) in <class-X>
  480. !     \fImatch\fR ( 0 ) in <class-X>
  481.   .DE
  482.   The star in the first two forms means: "or more".  Thus, the first
  483.   form would read: "match zero or more tokens".  The fourth form describes
  484. --- 528,535 ----
  485.       \fImatch\fR ( 0* )
  486.       \fImatch\fR ( 1* )
  487.       \fImatch\fR ( 1 )
  488. !     \fImatch\fR ( 1 ) \fIin\fR <class-X>
  489. !     \fImatch\fR ( 0 ) \fIin\fR <class-X>
  490.   .DE
  491.   The star in the first two forms means: "or more".  Thus, the first
  492.   form would read: "match zero or more tokens".  The fourth form describes
  493. ***************
  494. *** 504,509 ****
  495. --- 537,552 ----
  496.   the fifth form describes a field where one token is matched if it is not of the
  497.   given class (class-X).
  498.   .sp 1
  499. + In addition, the Sun release 3.0 version of sendmail supports several
  500. + new pattern matching operations represented by the following forms:
  501. + .DS
  502. +     \fImatch\fR ( 0 ) \fImap\fR <macro-identifier-X>
  503. +     \fImatch\fR ( 1 ) \fImap\fR <macro-identifier-X>
  504. +     \fImatch host\fR
  505. + .DE
  506. + The macro \*Qmacro-identifier-X\*U should be assigned the name of the
  507. + relevant YP map.
  508. + .sp 1
  509.   The following example,
  510.   .sp 1
  511.   .DS
  512. ***************
  513. *** 510,517 ****
  514.   \fIfield\fR
  515.       anypath        : \fImatch\fR ( 0* );
  516.       recipient_host    : \fImatch\fR ( 1 );
  517. !     local_site        : \fImatch\fR ( 1 ) in \fIm_sitename\fR;
  518. !     remote_site        : \fImatch\fR ( 0 ) in \fIm_sitename\fR;
  519.   .DE
  520.   defines the fields anypath, recipient_host, local_site, and remote_site.
  521.   .NH 2
  522. --- 553,560 ----
  523.   \fIfield\fR
  524.       anypath        : \fImatch\fR ( 0* );
  525.       recipient_host    : \fImatch\fR ( 1 );
  526. !     local_site        : \fImatch\fR ( 1 ) \fIin m_sitename\fR;
  527. !     remote_site        : \fImatch\fR ( 0 ) \fIin m_sitename\fR;
  528.   .DE
  529.   defines the fields anypath, recipient_host, local_site, and remote_site.
  530.   .NH 2
  531. ***************
  532. *** 536,541 ****
  533. --- 579,591 ----
  534.           <match-action> ( <rewriting-pattern> ) ;
  535.   .DE
  536.   where match-pattern, rewriting-pattern, and match-action are described below.
  537. + An alternative form is available:
  538. + .DS
  539. +     \fIwhile\fR ( <match-pattern> )
  540. +         <match-action> ( <rewriting-pattern> ) ;
  541. + .DE
  542. + which is somewhat more useful when the \*Qmatch-action\*U is \fIretry\fP
  543. + (see below).
  544.   .NH 3
  545.   Match-patterns
  546.   .PP
  547. ***************
  548. *** 601,609 ****
  549.   T}
  550.   
  551.   T{
  552. ! 7. Canonicalized host names of the form \fIcanon\fR (<id-token>),
  553. ! where id-token is a regular identifier, a quoted identifier (with
  554. ! double quotes), a macro reference yielding an identifier, or a 
  555.   positional reference in the matched address.  The canonicalization of 
  556.   a host name is simply a mapping to its canonical (or official) form.
  557.   T}
  558. --- 651,662 ----
  559.   T}
  560.   
  561.   T{
  562. ! 7. Canonicalized host names of the form \fIcanon\fR (<id-token-list>),
  563. ! where \*Qid-token-list\*U is a list of one or more \*Qid-tokens.\*U
  564. ! An \*Qid-token\*U is a regular identifier, a quoted identifier (with
  565. ! double quotes), a macro reference yielding an identifier,
  566. ! a numeric internet specification (see below),
  567. ! a literal character (such as a \*Q.\*U or a \*Q[\*U), or a 
  568.   positional reference in the matched address.  The canonicalization of 
  569.   a host name is simply a mapping to its canonical (or official) form.
  570.   T}
  571. ***************
  572. *** 682,688 ****
  573.       anypath    : \fImatch\fR (0*);
  574.       usr, path    : \fImatch\fR (1*);
  575.       hostname    : \fImatch\fR (1);
  576. !     phone_host    : \fImatch\fR (1) in phonehosts;
  577.   .DE
  578.   .DS
  579.   \fIruleset\fR
  580. --- 735,741 ----
  581.       anypath    : \fImatch\fR (0*);
  582.       usr, path    : \fImatch\fR (1*);
  583.       hostname    : \fImatch\fR (1);
  584. !     phone_host    : \fImatch\fR (1) \fIin\fR phonehosts;
  585.   .DE
  586.   .DS
  587.   \fIruleset\fR
  588. diff -c /dev/null ap4
  589. *** /dev/null    Mon Jan 25 15:47:24 1988
  590. --- ap4    Thu Jan 21 15:13:19 1988
  591. ***************
  592. *** 0 ****
  593. --- 1,15 ----
  594. + .DS C
  595. + \s+5\fBAppendix D\fR
  596. + 
  597. + 
  598. + \fBPre-Defined Classes\fR\s-5
  599. + .DE
  600. + .sp 5
  601. + .TS 
  602. + center box;
  603. + c|c|c
  604. + l|l|l.
  605. + \fBEase\fR Class    Raw Equivalent    Meaning
  606. + =
  607. + \fIc_myname\fR    w    The list of names by which this host is known
  608. + .TE
  609. Howard_The_Duck
  610. fi # end of overwriting check
  611. echo shar: extracting "'src.diffs'" '(29805 characters)'
  612. if test -f 'src.diffs'
  613. then
  614.     echo shar: will not over-write existing file "'src.diffs'"
  615. else
  616. cat << \Howard_The_Duck > 'src.diffs'
  617. diff -cr src/Makefile /usr/src/local/local.bin/ease/src/Makefile
  618. *** src/Makefile    Thu Aug 13 12:07:24 1987
  619. --- /usr/src/local/local.bin/ease/src/Makefile    Thu Jan 21 19:05:32 1988
  620. ***************
  621. *** 1,6 ****
  622.   # Makefile for Ease Translator (et).
  623.   #
  624. ! #    $Header: /usr/src/local/etc/ease/RCS/Makefile,v 1.4 85/10/29 22:57:06 jss Exp $
  625.   #
  626.   #    James S. Schoner, Purdue University Computing Center,
  627.   #              West Lafayette, Indiana  47907
  628. --- 1,6 ----
  629.   # Makefile for Ease Translator (et).
  630.   #
  631. ! #    $Header: Makefile,v 1.5 87/09/14 18:07:59 root Locked $
  632.   #
  633.   #    James S. Schoner, Purdue University Computing Center,
  634.   #              West Lafayette, Indiana  47907
  635. ***************
  636. *** 25,34 ****
  637.   LPFLAGS = -J"Ease Source"
  638.   
  639.   HDR = symtab.h
  640. ! SRC = main.c emitcf.c errors.c idman.c strops.c symtab.c
  641.   LST = Makefile lexan.l parser.y ${HDR} ${SRC}
  642.   DEP = y.tab.c lex.yy.c ${SRC}
  643. ! OBJ = y.tab.o lex.yy.o main.o emitcf.o errors.o idman.o strops.o symtab.o
  644.   
  645.   all: et
  646.   
  647. --- 25,35 ----
  648.   LPFLAGS = -J"Ease Source"
  649.   
  650.   HDR = symtab.h
  651. ! SRC = main.c emitcf.c errors.c idman.c strops.c symtab.c fixstrings.c
  652.   LST = Makefile lexan.l parser.y ${HDR} ${SRC}
  653.   DEP = y.tab.c lex.yy.c ${SRC}
  654. ! OBJ = y.tab.o lex.yy.o main.o emitcf.o errors.o idman.o strops.o symtab.o \
  655. !     fixstrings.o
  656.   
  657.   all: et
  658.   
  659. diff -cr src/emitcf.c /usr/src/local/local.bin/ease/src/emitcf.c
  660. *** src/emitcf.c    Thu Aug 13 12:08:15 1987
  661. --- /usr/src/local/local.bin/ease/src/emitcf.c    Thu Aug 13 16:24:32 1987
  662. ***************
  663. *** 1,4 ****
  664. ! /*    $Header: /usr/src/local/etc/ease/RCS/emitcf.c,v 1.3 85/11/22 20:14:11 jss Exp $    */
  665.   
  666.   /*
  667.    *    emitcf.c  -- This file contains routines associated with the writing
  668. --- 1,4 ----
  669. ! /*    $Header: emitcf.c,v 1.4 87/08/13 16:24:06 root Locked $    */
  670.   
  671.   /*
  672.    *    emitcf.c  -- This file contains routines associated with the writing
  673. ***************
  674. *** 17,22 ****
  675. --- 17,23 ----
  676.   
  677.   #include <stdio.h>
  678.   #include "symtab.h"
  679. + #include "fixstrings.h"
  680.   
  681.   #define REGLINE 60    /* length of output lines which may be continued */
  682.   #define MAXLINE 256    /* liberal maximum line length             */
  683. diff -cr src/errors.c /usr/src/local/local.bin/ease/src/errors.c
  684. *** src/errors.c    Thu Aug 13 12:07:50 1987
  685. --- /usr/src/local/local.bin/ease/src/errors.c    Thu Aug 13 16:24:35 1987
  686. ***************
  687. *** 1,4 ****
  688. ! /*    $Header: /usr/src/local/etc/ease/RCS/errors.c,v 1.2 85/10/29 23:40:20 jss Exp $    */
  689.   
  690.   /*
  691.    *      errors.c   -- Contains error initialization and reporting routines.
  692. --- 1,4 ----
  693. ! /*    $Header: errors.c,v 1.3 87/08/13 16:24:32 root Locked $    */
  694.   
  695.   /*
  696.    *      errors.c   -- Contains error initialization and reporting routines.
  697. ***************
  698. *** 15,20 ****
  699. --- 15,21 ----
  700.    */
  701.   
  702.   #include <stdio.h>
  703. + #include "fixstrings.h"
  704.   
  705.   extern int  ErrorCount;     /* error count                   */
  706.   extern char FNbuf[];     /* input file name              */
  707. diff -cr src/idman.c /usr/src/local/local.bin/ease/src/idman.c
  708. *** src/idman.c    Thu Aug 13 12:07:53 1987
  709. --- /usr/src/local/local.bin/ease/src/idman.c    Thu Aug 13 16:24:39 1987
  710. ***************
  711. *** 1,4 ****
  712. ! /*    $Header: /usr/src/local/etc/ease/RCS/idman.c,v 1.2 85/10/29 23:41:38 jss Exp $    */
  713.   
  714.   /*
  715.    *      idman.c    -- Contains routines for manipulating identifiers and their
  716. --- 1,4 ----
  717. ! /*    $Header: idman.c,v 1.3 87/08/13 16:24:36 root Locked $    */
  718.   
  719.   /*
  720.    *      idman.c    -- Contains routines for manipulating identifiers and their
  721. ***************
  722. *** 17,22 ****
  723. --- 17,23 ----
  724.   
  725.   #include <stdio.h>
  726.   #include "symtab.h"
  727. + #include "fixstrings.h"
  728.   
  729.   extern struct he *LookupSymbol ();
  730.   extern void      FatalError (),
  731. diff -cr src/lexan.l /usr/src/local/local.bin/ease/src/lexan.l
  732. *** src/lexan.l    Thu Aug 13 12:07:55 1987
  733. --- /usr/src/local/local.bin/ease/src/lexan.l    Mon Jan 25 15:41:26 1988
  734. ***************
  735. *** 1,5 ****
  736.   %{
  737. ! /*    $Header: /usr/src/local/etc/ease/RCS/lexan.l,v 1.2 85/10/29 23:42:40 jss Exp $    */
  738.   
  739.   /*
  740.    *    lexan.l -- Lexical Analyzer for EASE.
  741. --- 1,5 ----
  742.   %{
  743. ! /*    $Header: lexan.l,v 1.9 88/01/25 15:41:02 root Locked $    */
  744.   
  745.   /*
  746.    *    lexan.l -- Lexical Analyzer for EASE.
  747. ***************
  748. *** 19,24 ****
  749. --- 19,25 ----
  750.    *
  751.    */
  752.   
  753. + #include "fixstrings.h"
  754.   #include "symtab.h"
  755.   #include "lexdefs.h"
  756.   
  757. ***************
  758. *** 33,44 ****
  759.   char FNbuf[MaxFN];            /* file name buffer        */
  760.   short RMatch  = FALSE;            /* ruleset match flag          */
  761.   
  762.   %}
  763.   
  764.   /* lex-specific extensions */
  765. ! %e 1100
  766. ! %p 3700
  767. ! %n 500
  768.   
  769.   %%
  770.       int INch;            /* any input character */
  771. --- 34,73 ----
  772.   char FNbuf[MaxFN];            /* file name buffer        */
  773.   short RMatch  = FALSE;            /* ruleset match flag          */
  774.   
  775. + #undef input
  776. + # define input() (((yytchar=yysptr>yysbuf?U(*--yysptr):Getc(yyin,yyout))==10?(yylineno++,yytchar):yytchar)==EOF?0:yytchar)
  777. + 
  778. + char
  779. + Getc (yyin, yyout)
  780. +     FILE *yyin, *yyout;
  781. + {
  782. +     static char linbuf[BUFSIZ], *pc = linbuf;
  783. +     char c;
  784. + 
  785. +     /* initialize buffer: first call only */
  786. +     if (*pc == '\0' && pc == linbuf) {
  787. +         if (fgets(linbuf, BUFSIZ, yyin)==NULL)
  788. +             return EOF;
  789. +         fprintf(yyout, "# %s", linbuf);  /* echo input as comment */
  790. +     }
  791. +     c = *pc++;
  792. +     if (c == '\n') {
  793. +         pc = linbuf;
  794. +         if (fgets(linbuf, BUFSIZ, yyin) == NULL)
  795. +             *pc = EOF;
  796. +         else
  797. +             /* echo input as comment */
  798. +             fprintf(yyout, "# %s", linbuf);
  799. +     }
  800. +     return c;
  801. + }
  802. + 
  803.   %}
  804.   
  805.   /* lex-specific extensions */
  806. ! %e 1300
  807. ! %p 4000
  808. ! %n 600
  809.   
  810.   %%
  811.       int INch;            /* any input character */
  812. ***************
  813. *** 45,56 ****
  814.   
  815.   [ \t\f]+            ;     /* discard whitepsace  */
  816.   [\n]                Lcount++;
  817. ! ^\#[ \t]*[0-9]+[ \t]*\".*\"[ \t]*$    {
  818.                       sscanf (yytext, "%*c%d%s", &Lcount, FNbuf);
  819. -                     INch = input ();
  820.                       }
  821.   match                return (MATCH);
  822.   in                return (IN);
  823.   bind                return (BIND);
  824.   define                return (DEFINE);
  825.   macro                return (MACRO);
  826. --- 74,85 ----
  827.   
  828.   [ \t\f]+            ;     /* discard whitepsace  */
  829.   [\n]                Lcount++;
  830. ! ^\#[ \t]*[0-9]+[ \t]*\".*\"[ \t]*[\n]    {
  831.                       sscanf (yytext, "%*c%d%s", &Lcount, FNbuf);
  832.                       }
  833.   match                return (MATCH);
  834.   in                return (IN);
  835. + map                return (MAP);
  836.   bind                return (BIND);
  837.   define                return (DEFINE);
  838.   macro                return (MACRO);
  839. ***************
  840. *** 64,69 ****
  841. --- 93,99 ----
  842.   host                return (HOST);
  843.   user                return (USER);
  844.   hostnum                return (HOSTNUM);
  845. + while        |
  846.   if                return (IF);
  847.   retry                return (RETRY);
  848.   next                return (NEXT);
  849. ***************
  850. *** 106,111 ****
  851. --- 136,142 ----
  852.   o_rsend                return (MOPT);
  853.   o_dnet                return (NNOPT);
  854.   o_hformat            return (OOPT);
  855. + o_qfactor            return (QOPT);
  856.   o_qdir                return (QQOPT);
  857.   o_tread                return (ROPT);
  858.   o_flog                return (SSOPT);
  859. ***************
  860. *** 117,122 ****
  861. --- 148,157 ----
  862.   o_wizpass            return (WWOPT);
  863.   o_loadq                return (XOPT);
  864.   o_loadnc            return (XXOPT);
  865. + o_recipfactor            return (YOPT);
  866. + o_newproc            return (YYOPT);
  867. + o_prifactor            return (ZOPT);
  868. + o_waitfactor            return (ZZOPT);
  869.   f_ffrom                return (FFLAG);
  870.   f_rfrom                return (RFLAG);
  871.   f_noreset            return (SSFLAG);
  872. ***************
  873. *** 139,144 ****
  874. --- 174,180 ----
  875.   f_retsmtp            return (PFLAG);
  876.   f_smtp                return (IIFLAG);
  877.   f_addrw                return (CCFLAG);
  878. + f_escape            return (EEFLAG);
  879.   [A-Za-z][A-Za-z0-9_-]*        {
  880.                   /* store identifiers in symbol table */
  881.                   yylval.phe = LookupSymbol (yytext);
  882. ***************
  883. *** 149,154 ****
  884. --- 185,191 ----
  885.                       ErrorReport ("End of line in string.\n");
  886.                       unput (INch);
  887.                   }
  888. +                 fixquotes ();
  889.                   yylval.psb = (char *) malloc (strlen (yytext) + 1);
  890.                   strcpy (yylval.psb, yytext + 1);
  891.                   return (SCONST);
  892. ***************
  893. *** 197,199 ****
  894. --- 234,261 ----
  895.                   }
  896.                   }
  897.   %%
  898. + 
  899. + /*
  900. +  * fixquotes --- inside a "quoted string", turn `\"' into just `"'
  901. +  *
  902. +  * this is most useful inside the Argv strings for mailers,
  903. +  * particularly when debugging.
  904. +  */
  905. + 
  906. + fixquotes ()
  907. + {
  908. +     register char *cp1, *cp2;
  909. + 
  910. +     cp1 = cp2 = yytext;
  911. +     while (*cp2) {
  912. +         /*
  913. +          * if we really wanted to get fancy,
  914. +          * at this point we'd handle C escapes,
  915. +          * but I don't think it's necessary.
  916. +          */
  917. +         if (*cp2 == '\\' && cp2[1] == '"')
  918. +             cp2++;
  919. +         *cp1++ = *cp2++;
  920. +     }
  921. +     *cp1++ = *cp2++;    /* final '\0' */
  922. + }
  923. diff -cr src/main.c /usr/src/local/local.bin/ease/src/main.c
  924. *** src/main.c    Thu Aug 13 12:07:57 1987
  925. --- /usr/src/local/local.bin/ease/src/main.c    Thu Aug 13 16:24:50 1987
  926. ***************
  927. *** 1,4 ****
  928. ! /*    $Header: /usr/src/local/etc/ease/RCS/main.c,v 1.2 85/10/29 23:43:38 jss Exp $    */
  929.   
  930.   /*
  931.    *      main.c     -- Main procedure for Ease Translator.
  932. --- 1,4 ----
  933. ! /*    $Header: main.c,v 1.3 87/08/13 16:24:47 root Locked $    */
  934.   
  935.   /*
  936.    *      main.c     -- Main procedure for Ease Translator.
  937. ***************
  938. *** 14,19 ****
  939. --- 14,20 ----
  940.    *
  941.    */
  942.   
  943. + #include "fixstrings.h"
  944.   #include <stdio.h>
  945.   
  946.   extern FILE *DIAGf;            /* diagnostic file */
  947. ***************
  948. *** 100,113 ****
  949.       }
  950.       printf ("###################################################\n");
  951.       printf ("##                                               ##\n");
  952. !     printf ("##  WARNING: THIS FILE IS TO BE MODIFIED BY      ##\n");
  953. !     printf ("##           THE EASE TRANSLATOR (ET) ONLY.      ##\n");
  954.       printf ("##                                               ##\n");
  955. !     printf ("##           ALL OTHER MODIFICATIONS WILL        ##\n");
  956. !     printf ("##           DISAPPEAR THE NEXT TIME ET IS RUN.  ##\n");
  957. !     printf ("##                                               ##\n");
  958. !     printf ("##           MAKE MODIFICATIONS TO THE EASE      ##\n");
  959. !     printf ("##           SOURCE ONLY.                        ##\n");
  960.       printf ("##                                               ##\n");
  961.       printf ("###################################################\n");
  962.   }
  963. --- 101,114 ----
  964.       }
  965.       printf ("###################################################\n");
  966.       printf ("##                                               ##\n");
  967. !     printf ("##  WARNING: THIS FILE IS THE OUTPUT OF THE      ##\n");
  968. !     printf ("##           `EASE' PRECOMPILER FOR SENDMAIL     ##\n");
  969. !     printf ("##           CONFIGURATION FILES.                ##\n");
  970.       printf ("##                                               ##\n");
  971. !     printf ("##           MAKE MODIFICATIONS TO THE SOURCE    ##\n");
  972. !     printf ("##           FILE ONLY.  CHANGES MADE DIRECTLY   ##\n");
  973. !     printf ("##           TO THIS FILE WILL DISAPPEAR THE     ##\n");
  974. !     printf ("##           NEXT TIME THAT EASE IS RUN.         ##\n");
  975.       printf ("##                                               ##\n");
  976.       printf ("###################################################\n");
  977.   }
  978. diff -cr src/parser.y /usr/src/local/local.bin/ease/src/parser.y
  979. *** src/parser.y    Thu Aug 13 12:08:20 1987
  980. --- /usr/src/local/local.bin/ease/src/parser.y    Mon Jan 25 15:41:46 1988
  981. ***************
  982. *** 1,5 ****
  983.   %{
  984. ! /*    $Header: /usr/src/local/etc/ease/RCS/parser.y,v 1.3 85/12/10 18:02:11 jss Exp $    */
  985.   
  986.   /*
  987.    *    parser.y -- EASE parser.
  988. --- 1,5 ----
  989.   %{
  990. ! /*    $Header: parser.y,v 1.10 88/01/25 15:41:27 root Locked $    */
  991.   
  992.   /*
  993.    *    parser.y -- EASE parser.
  994. ***************
  995. *** 17,24 ****
  996. --- 17,40 ----
  997.    *
  998.    *    All rights reserved.
  999.    *
  1000. +  ***************************************************************************
  1001. +  *
  1002. +  * EUCC - Arnold Robbins - 8/13/87.
  1003. +  * Added in support for new options and mailer flag in 4.3 sendmail.
  1004. +  *
  1005. +  * FLUKE jps 18-jun-86 - Changes made to support more flexibility in
  1006. +  * defining header strings as concatenations of simple strings or `ifset'
  1007. +  * strings. Also changes to support Sun sendmail accessing YP maps.
  1008. +  *
  1009. +  * EUCC - Arnold Robbins - 12/22/87.
  1010. +  * Made some changes to restore some functionality in string concatenation,
  1011. +  * and to remove reduce/reduce conflicts in JPS's original productions.
  1012. +  *
  1013. +  * EUCC - Arnold Robbins - 1/21/88
  1014. +  * Missed a 4.3 flag earlier.
  1015.    */
  1016.   
  1017. + #include "fixstrings.h"
  1018.   #include <stdio.h>
  1019.   #include "symtab.h"
  1020.   
  1021. ***************
  1022. *** 73,82 ****
  1023. --- 89,101 ----
  1024.   %token AAOPT AOPT BBOPT COPT DOPT DOPTI DOPTB DOPTQ DDOPT EOPT EOPTP EOPTE 
  1025.   %token EOPTM EOPTW EOPTZ FFOPT FOPT GOPT HHOPT IOPT LLOPT MOPT NNOPT OOPT QQOPT
  1026.   %token ROPT SSOPT SOPT TTOPT TOPT UOPT VOPT WWOPT XOPT XXOPT
  1027. + %token QOPT YOPT YYOPT ZOPT ZZOPT
  1028. + %token EEFLAG
  1029.   %token FFLAG RFLAG SSFLAG NFLAG LFLAG SFLAG MFLAG FFFLAG DDFLAG MMFLAG XFLAG
  1030.   %token PPFLAG UFLAG HFLAG AAFLAG UUFLAG EFLAG XXFLAG LLFLAG PFLAG IIFLAG CCFLAG
  1031.   %token ASGN COMMA LBRACE RBRACE LPAREN RPAREN SEMI DOLLAR MATCH IN HOSTNUM
  1032.   %token DEFINE FIELD COLON STAR HOST USER
  1033. + %token MAP
  1034.   
  1035.   %type    <psb>        mval strval ifcon conval ifres elseres nameset namelist
  1036.   %type    <psb>        doptid eoptid idlist fcond dlist mflags route mdefs
  1037. ***************
  1038. *** 83,88 ****
  1039. --- 102,108 ----
  1040.   %type    <psb>        matchaddr matchtok action actionstmt mailerspec mtdef
  1041.   %type    <psb>        rwaddr rwtok ftype reftok rword cantok resolution
  1042.   %type    <psb>        userspec hword hostid dheader
  1043. + %type    <psb>        catstring canval canvaltok
  1044.   %type    <ival>        anychar
  1045.   %type    <phe>        cdef
  1046.   %type    <optval>    optid
  1047. ***************
  1048. *** 297,302 ****
  1049. --- 317,325 ----
  1050.           |    QQOPT {
  1051.                   $$ = opt_Q;
  1052.               }
  1053. +         |    QOPT {
  1054. +                 $$ = opt_q;
  1055. +             }
  1056.           |    ROPT {
  1057.                   $$ = opt_r;
  1058.               }
  1059. ***************
  1060. *** 327,332 ****
  1061. --- 350,367 ----
  1062.           |    XXOPT {
  1063.                   $$ = opt_X;
  1064.               }
  1065. +         |    YOPT {
  1066. +                 $$ = opt_y;
  1067. +             }
  1068. +         |    YYOPT {
  1069. +                 $$ = opt_Y;
  1070. +             }
  1071. +         |    ZOPT {
  1072. +                 $$ = opt_z;
  1073. +             }
  1074. +         |    ZZOPT {
  1075. +                 $$ = opt_Z;
  1076. +             }
  1077.           ;
  1078.   
  1079.   doptid        :    DOPTI {
  1080. ***************
  1081. *** 477,482 ****
  1082. --- 512,520 ----
  1083.           |    CCFLAG {
  1084.                   $$ = flg_C;
  1085.               }
  1086. +         |    EEFLAG {
  1087. +                 $$ = flg_E;
  1088. +             }
  1089.           ;
  1090.   
  1091.   dheader        :    /* empty */ {
  1092. ***************
  1093. *** 497,503 ****
  1094.           |    error
  1095.           ;
  1096.   
  1097. ! dlist        :    LPAREN strval COMMA mval RPAREN {
  1098.                   $$ = ListAppend ($2, MacScan ($4), " ");
  1099.                   free ($2);
  1100.                   free ($4);
  1101. --- 535,541 ----
  1102.           |    error
  1103.           ;
  1104.   
  1105. ! dlist        :    LPAREN strval COMMA catstring RPAREN {
  1106.                   $$ = ListAppend ($2, MacScan ($4), " ");
  1107.                   free ($2);
  1108.                   free ($4);
  1109. ***************
  1110. *** 507,512 ****
  1111. --- 545,569 ----
  1112.               }
  1113.           ;
  1114.   
  1115. + catstring    :    SCONST {
  1116. +                 $$ = $1;
  1117. +             }
  1118. +         |    ifcon {
  1119. +                 $$ = $1;
  1120. +             }
  1121. +         |    CONCAT LPAREN conval RPAREN {
  1122. +                 $$ = $3;
  1123. +             }
  1124. +         |    catstring SCONST {
  1125. +                 $$ = ListAppend ($1, $2, (char *) NULL);
  1126. +                 free ($1);
  1127. +             }
  1128. +         |    catstring ifcon {
  1129. +                 $$ = ListAppend ($1, $2, (char *) NULL);
  1130. +                 free ($2);
  1131. +             }
  1132. +         ;
  1133. + 
  1134.   mlist        :    /* empty */
  1135.           |    mlist IDENT LBRACE mdefs RBRACE SEMI {
  1136.                   EmitDef (def_mailer, $2, $4, (char *) NULL);
  1137. ***************
  1138. *** 672,687 ****
  1139.               }
  1140.           ;
  1141.   
  1142. ! cantok        :    CANON LPAREN IDENT RPAREN {
  1143. !                 $$ = Bracket ($3->psb, TRUE);
  1144. !                 RemoveSymbol ($3);
  1145. !             }
  1146. !         |    CANON LPAREN SCONST RPAREN {
  1147. !                 $$ = Bracket (MacScan ($3), TRUE);
  1148.                   free ($3);
  1149.               }
  1150. !         |    CANON LPAREN reftok RPAREN {
  1151. !                 $$ = Bracket ($3, TRUE);
  1152.                   free ($3);
  1153.               }
  1154.           ;
  1155. --- 729,766 ----
  1156.               }
  1157.           ;
  1158.   
  1159. ! cantok        :    CANON LPAREN canval RPAREN {
  1160. !                 $$ = Bracket ($3, TRUE);
  1161.                   free ($3);
  1162.               }
  1163. ! 
  1164. ! canval        :    canvaltok {
  1165. !                 $$ = $1;
  1166. !             }
  1167. !         |    canval canvaltok {
  1168. !                 $$ = ListAppend ($1, $2, (char *) NULL);
  1169. !                 free ($1);
  1170. !                 free ($2);
  1171. !             }
  1172. !         ;
  1173. ! 
  1174. ! canvaltok    :    IDENT {
  1175. !                 $$ = ListAppend ($1->psb, (char *) NULL, (char *) NULL);
  1176. !                 RemoveSymbol ($1);
  1177. !             }
  1178. !         |    SCONST {
  1179. !                 $$ = ListAppend (MacScan ($1), (char *) NULL, (char *) NULL);
  1180. !                 free ($1);
  1181. !             }
  1182. !         |    reftok {
  1183. !                 $$ = $1;
  1184. !             }
  1185. !         |    SEPCHAR {
  1186. !                 *Cbuf = $1;
  1187. !                 $$ = ListAppend (Cbuf, (char *) NULL, (char *) NULL);
  1188. !             }
  1189. !         |    HOSTNUM LPAREN reftok RPAREN {
  1190. !                 $$ = Bracket ($3, FALSE);
  1191.                   free ($3);
  1192.               }
  1193.           ;
  1194. ***************
  1195. *** 804,814 ****
  1196.           ;
  1197.   
  1198.   ftype        :    MATCH LPAREN ICONST RPAREN cdef {
  1199. !                 $$ = ListAppend (MakeField ($3, $5, FALSE), 
  1200.                                (char *) NULL, (char *) NULL);
  1201.               }
  1202.           |    MATCH LPAREN ICONST STAR RPAREN {
  1203. !                 $$ = ListAppend (MakeField ($3, (struct he *) NULL, TRUE), 
  1204.                            (char *) NULL, (char *) NULL);
  1205.               }
  1206.           |    error {
  1207. --- 883,901 ----
  1208.           ;
  1209.   
  1210.   ftype        :    MATCH LPAREN ICONST RPAREN cdef {
  1211. !                 $$ = ListAppend (MakeField ($3, $5, FALSE, FALSE), 
  1212.                                (char *) NULL, (char *) NULL);
  1213.               }
  1214. +         |    MATCH LPAREN ICONST RPAREN MAP IDENT {
  1215. +                 $$ = ListAppend (MakeField ($3, $6, FALSE, TRUE), 
  1216. +                              (char *) NULL, (char *) NULL);
  1217. +             }
  1218. +         |    MATCH HOST {
  1219. +                 $$ = ListAppend ("$%y", 
  1220. +                              (char *) NULL, (char *) NULL);
  1221. +             }
  1222.           |    MATCH LPAREN ICONST STAR RPAREN {
  1223. !                 $$ = ListAppend (MakeField ($3, (struct he *) NULL, TRUE, FALSE), 
  1224.                            (char *) NULL, (char *) NULL);
  1225.               }
  1226.           |    error {
  1227. diff -cr src/strops.c /usr/src/local/local.bin/ease/src/strops.c
  1228. *** src/strops.c    Thu Aug 13 12:08:23 1987
  1229. --- /usr/src/local/local.bin/ease/src/strops.c    Mon Jan 25 15:41:53 1988
  1230. ***************
  1231. *** 1,4 ****
  1232. ! /*    $Header: /usr/src/local/etc/ease/RCS/strops.c,v 1.2 85/10/29 23:45:39 jss Exp $    */
  1233.   
  1234.   /*
  1235.    *    strops.c   -- Contains string operation routines used for constructing
  1236. --- 1,4 ----
  1237. ! /*    $Header: strops.c,v 1.5 88/01/25 15:41:47 root Locked $    */
  1238.   
  1239.   /*
  1240.    *    strops.c   -- Contains string operation routines used for constructing
  1241. ***************
  1242. *** 15,20 ****
  1243. --- 15,21 ----
  1244.    *
  1245.    */
  1246.   
  1247. + #include "fixstrings.h"
  1248.   #include <stdio.h>
  1249.   #include <strings.h>
  1250.   #include "symtab.h"
  1251. ***************
  1252. *** 34,39 ****
  1253. --- 35,54 ----
  1254.   static char   *Ofield = "$-";        /* one token match structure      */
  1255.   static char   *Zfield = "$*";        /* zero or more tokens structure  */
  1256.   static char   *Pfield = "$+";        /* one or more tokens structure      */
  1257. + 
  1258. + /*
  1259. +  *  FLUKE jps 25-apr-86
  1260. +  *
  1261. +  *  Add the three new $%x, $%y, and $!x match operators that Sun introduced
  1262. +  *  with release 3.0.
  1263. +  *
  1264. +  *  BUG (probably) - Sun has assigned a predefined meaning to the $y macro;
  1265. +  *  I imagine we will need to teach ease to avoid this letter.
  1266. +  */
  1267. + static char   *Hfield = "$%y";        /*    match in /etc/hosts */
  1268. + static char   *Mfield = "$% ";        /*    match in specified YP map */
  1269. + static char   *Nfield = "$! ";        /* no match in specified YP map */
  1270. + 
  1271.   static char   *Mtest  = "$? ";        /* conditional macro test string  */
  1272.   
  1273.   
  1274. ***************
  1275. *** 69,74 ****
  1276. --- 84,90 ----
  1277.           case opt_o  :    return ("o");
  1278.           case e_opt_p:    return ("p");
  1279.           case opt_Q  :    return ("Q");
  1280. +         case opt_q  :    return ("q");
  1281.           case d_opt_q:    return ("q");
  1282.           case opt_r  :    return ("r");
  1283.           case opt_S  :    return ("S");
  1284. ***************
  1285. *** 81,86 ****
  1286. --- 97,106 ----
  1287.           case e_opt_w:    return ("w");
  1288.           case opt_x  :    return ("x");
  1289.           case opt_X  :    return ("X");
  1290. +         case opt_y  :    return ("y");
  1291. +         case opt_Y  :    return ("Y");
  1292. +         case opt_z  :    return ("z");
  1293. +         case opt_Z  :    return ("Z");
  1294.           case e_opt_z:    return ("z");
  1295.           default     :    FatalError ("Bad case in ConvOpt ()", (char *) NULL);
  1296.       }
  1297. ***************
  1298. *** 120,125 ****
  1299. --- 140,146 ----
  1300.           case flg_p:    return ("p");
  1301.           case flg_I:    return ("I");
  1302.           case flg_C:    return ("C");
  1303. +         case flg_E:    return ("E");
  1304.           default   :    FatalError ("Bad case in ConvFlg ()", (char *) NULL);
  1305.       }
  1306.       /*NOTREACHED*/
  1307. ***************
  1308. *** 336,346 ****
  1309.           PrintError ("Undefined ruleset identifier:", cid->psb);
  1310.           return ((char *) NULL);
  1311.       }
  1312. !     res = (char *) malloc (strlen (cid->idval.rsn) + strlen (rwaddr) + 3);
  1313.       if (res == NULL)
  1314.           FatalError ("System out of string space in MakeRSCall ()", (char *) NULL);
  1315.       res = strcpy (res, "$>");    /* construct the call string */
  1316.       res = strcat (res, cid->idval.rsn);
  1317.       res = strcat (res, rwaddr);
  1318.       return (res);
  1319.   }
  1320. --- 357,376 ----
  1321.           PrintError ("Undefined ruleset identifier:", cid->psb);
  1322.           return ((char *) NULL);
  1323.       }
  1324. !     /*
  1325. !      * FLUKE jps - 8-may-86 - boost string size by 1 to accomodate space
  1326. !      * character.
  1327. !      */
  1328. !     res = (char *) malloc (strlen (cid->idval.rsn) + strlen (rwaddr) + 4);
  1329.       if (res == NULL)
  1330.           FatalError ("System out of string space in MakeRSCall ()", (char *) NULL);
  1331.       res = strcpy (res, "$>");    /* construct the call string */
  1332.       res = strcat (res, cid->idval.rsn);
  1333. +     res = strcat (res, " ");  /* FLUKE jps - work around sendmail bug:
  1334. +                    * whitespace is needed to separate tokens:
  1335. +                    * for example:  $>30$D will confuse
  1336. +                    * sendmail, but $>30 $D is OK.
  1337. +                    */
  1338.       res = strcat (res, rwaddr);
  1339.       return (res);
  1340.   }
  1341. ***************
  1342. *** 353,364 ****
  1343.    *            are used to determine what type of field string to
  1344.    *            construct.
  1345.    *
  1346.    */
  1347.   char *
  1348. ! MakeField (count, class, fstar)
  1349.   register int count;        /* match count (0 or 1) */
  1350.   register struct he *class;    /* optional class type  */
  1351.   register short fstar;        /* repetition flag    */
  1352.   {
  1353.       switch (count) {
  1354.           case 0:      if (class == NULL)    /* any token is valid */
  1355. --- 383,398 ----
  1356.    *            are used to determine what type of field string to
  1357.    *            construct.
  1358.    *
  1359. +  *  FLUKE jps 25-apr-86 - Modified to add a fourth parameter "isYPmap".  This
  1360. +  *  supports Sun's new Yellow Pages match patterns added in release 3.0.
  1361. +  *
  1362.    */
  1363.   char *
  1364. !     MakeField (count, class, fstar, isYPmap)
  1365.   register int count;        /* match count (0 or 1) */
  1366.   register struct he *class;    /* optional class type  */
  1367.   register short fstar;        /* repetition flag    */
  1368. + register short isYPmap;        /* "class" name is really a YP map name */
  1369.   {
  1370.       switch (count) {
  1371.           case 0:      if (class == NULL)    /* any token is valid */
  1372. ***************
  1373. *** 368,387 ****
  1374.                       ErrorReport ("Invalid field type.\n");
  1375.                       return ((char *) NULL);
  1376.                   }
  1377. !               else {        /* match 0 from class */
  1378.                   Cfield[1] = '~';
  1379.                   Cfield[2] = MakeMac (class, ID_CLASS);
  1380.                   return (Cfield);
  1381.                 }
  1382.           case 1:      if (class == NULL)    /* any token is valid */
  1383.                   if (fstar)
  1384.                       return (Pfield);
  1385.                   else
  1386.                       return (Ofield);
  1387. !               else {        /* match 1 from class */
  1388.                   Cfield[1] = '=';
  1389.                   Cfield[2] = MakeMac (class, ID_CLASS);
  1390.                   return (Cfield);
  1391.                 }
  1392.           default:  ErrorReport ("Invalid field type.\n");
  1393.       }
  1394. --- 402,439 ----
  1395.                       ErrorReport ("Invalid field type.\n");
  1396.                       return ((char *) NULL);
  1397.                   }
  1398. !               else {        /* match 0 from class or map */
  1399. !                 if (isYPmap) {
  1400. !                     /*  "class" is a misnomer here; it's really
  1401. !                      *  a simple macro name for a YP map.
  1402. !                      *  FLUKE jps 25-apr-86
  1403. !                      */
  1404. !                     Nfield[2] = MakeMac (class, ID_MACRO);
  1405. !                     return (Nfield);
  1406. !                 } else {
  1407.                   Cfield[1] = '~';
  1408.                   Cfield[2] = MakeMac (class, ID_CLASS);
  1409.                   return (Cfield);
  1410.                 }
  1411. +               }
  1412.           case 1:      if (class == NULL)    /* any token is valid */
  1413.                   if (fstar)
  1414.                       return (Pfield);
  1415.                   else
  1416.                       return (Ofield);
  1417. !               else {        /* match 1 from class or map */
  1418. !                 if (isYPmap) {
  1419. !                     /*  "class" is a misnomer here; it's really
  1420. !                      *  a simple macro name for a YP map.
  1421. !                      *  FLUKE jps 25-apr-86
  1422. !                      */
  1423. !                     Mfield[2] = MakeMac (class, ID_MACRO);
  1424. !                     return (Mfield);
  1425. !                 } else {
  1426.                   Cfield[1] = '=';
  1427.                   Cfield[2] = MakeMac (class, ID_CLASS);
  1428.                   return (Cfield);
  1429. +                 }
  1430.                 }
  1431.           default:  ErrorReport ("Invalid field type.\n");
  1432.       }
  1433. diff -cr src/symtab.c /usr/src/local/local.bin/ease/src/symtab.c
  1434. *** src/symtab.c    Thu Aug 13 12:08:01 1987
  1435. --- /usr/src/local/local.bin/ease/src/symtab.c    Thu Aug 13 16:25:19 1987
  1436. ***************
  1437. *** 1,4 ****
  1438. ! /*    $Header: /usr/src/local/etc/ease/RCS/symtab.c,v 1.2 85/10/29 23:46:48 jss Exp $    */
  1439.   
  1440.   /*
  1441.    *      symtab.c   -- Contains Ease Translator symbol table routines.
  1442. --- 1,4 ----
  1443. ! /*    $Header: symtab.c,v 1.3 87/08/13 16:25:09 root Locked $    */
  1444.   
  1445.   /*
  1446.    *      symtab.c   -- Contains Ease Translator symbol table routines.
  1447. ***************
  1448. *** 14,19 ****
  1449. --- 14,20 ----
  1450.    *
  1451.    */
  1452.   
  1453. + #include "fixstrings.h"
  1454.   #include <stdio.h>
  1455.   #include <ctype.h>
  1456.   #include "symtab.h"
  1457. ***************
  1458. *** 59,64 ****
  1459. --- 60,70 ----
  1460.               {"sentinel",    '\0'}
  1461.   };
  1462.   
  1463. + /* FLUKE jps 28-apr-86 - Install some wired-in class names */
  1464. + static struct Defmac ClassDefs[] = {    /* predefined classes */
  1465. +             {"c_myname",    'w'},
  1466. +             {"class_sentinel",    '\0'}
  1467. + };
  1468.   
  1469.   /*
  1470.    *    DefScan () -- Scan symbol table to find macros, classes, mailers, 
  1471. ***************
  1472. *** 81,87 ****
  1473. --- 87,101 ----
  1474.                        isupper(hcsearch->idval.idc)) &&
  1475.                        !ISMACRO(hcsearch->idd))
  1476.                       PrintWarning ("Macro not defined: %s\n", hcsearch->psb);
  1477. + #ifdef notdef
  1478.                   if (ISCLASS(hcsearch->idtype) && !ISCLASS(hcsearch->idd))
  1479. + #else
  1480. +                 /* FLUKE jps 28-apr-86 */
  1481. +                 /* print warnings for UPPER CASE names only */
  1482. +                 if (ISCLASS(hcsearch->idtype) &&
  1483. +                     isupper(hcsearch->idval.idc) &&
  1484. +                     !ISCLASS(hcsearch->idd))
  1485. + #endif
  1486.                       PrintWarning ("Class not defined: %s\n", hcsearch->psb);
  1487.                   if (ISMAILER(hcsearch->idtype) && !ISMAILER(hcsearch->idd))
  1488.                       PrintWarning ("Mailer not defined: %s\n", hcsearch->psb);
  1489. ***************
  1490. *** 122,127 ****
  1491. --- 136,148 ----
  1492.       for (macptr = &MacDefs[0]; (*macptr).macrep != '\0'; macptr++) {
  1493.           symptr = LookupSymbol ((*macptr).macname);
  1494.           symptr->idtype |= ID_MACRO;
  1495. +         symptr->idval.idc = (*macptr).macrep;
  1496. +     }
  1497. + 
  1498. +     /* preload special (lower-case) classes */
  1499. +     for (macptr = &ClassDefs[0]; (*macptr).macrep != '\0'; macptr++) {
  1500. +         symptr = LookupSymbol ((*macptr).macname);
  1501. +         symptr->idtype |= ID_CLASS;
  1502.           symptr->idval.idc = (*macptr).macrep;
  1503.       }
  1504.   
  1505. diff -cr src/symtab.h /usr/src/local/local.bin/ease/src/symtab.h
  1506. *** src/symtab.h    Thu Aug 13 12:07:25 1987
  1507. --- /usr/src/local/local.bin/ease/src/symtab.h    Mon Jan 25 15:41:58 1988
  1508. ***************
  1509. *** 1,4 ****
  1510. ! /*    $Header: /usr/src/local/etc/ease/RCS/symtab.h,v 1.2 85/10/29 23:47:47 jss Exp $    */
  1511.   
  1512.   /*
  1513.    *    symtab.h    -- Definitions related to the "et" symbol table. 
  1514. --- 1,4 ----
  1515. ! /*    $Header: symtab.h,v 1.4 88/01/25 15:41:54 root Locked $    */
  1516.   
  1517.   /*
  1518.    *    symtab.h    -- Definitions related to the "et" symbol table. 
  1519. ***************
  1520. *** 45,52 ****
  1521.   
  1522.   /* option types */
  1523.   enum opts {opt_A, opt_a, opt_B, opt_c, opt_D, opt_d, opt_e, opt_F, opt_f, 
  1524. !        opt_g, opt_H, opt_i, opt_L, opt_m, opt_N, opt_o, opt_Q, opt_r, 
  1525. !        opt_S, opt_s, opt_T, opt_t, opt_u, opt_v, opt_W, opt_x, opt_X, 
  1526.          d_opt_i, d_opt_b, d_opt_q,
  1527.          e_opt_p, e_opt_e, e_opt_m, e_opt_w, e_opt_z};
  1528.   
  1529. --- 45,53 ----
  1530.   
  1531.   /* option types */
  1532.   enum opts {opt_A, opt_a, opt_B, opt_c, opt_D, opt_d, opt_e, opt_F, opt_f, 
  1533. !        opt_g, opt_H, opt_i, opt_L, opt_m, opt_N, opt_o, opt_Q, opt_q,
  1534. !        opt_r, opt_S, opt_s, opt_T, opt_t, opt_u, opt_v, opt_W, opt_x,
  1535. !        opt_X, opt_Y, opt_y, opt_Z, opt_z,
  1536.          d_opt_i, d_opt_b, d_opt_q,
  1537.          e_opt_p, e_opt_e, e_opt_m, e_opt_w, e_opt_z};
  1538.   
  1539. ***************
  1540. *** 53,59 ****
  1541.   /* flag types */
  1542.   enum flgs {flg_f, flg_r, flg_S, flg_n, flg_l, flg_s, flg_m, flg_F, flg_D,
  1543.          flg_M, flg_x, flg_P, flg_u, flg_h, flg_A, flg_U, flg_e, flg_X,
  1544. !        flg_L, flg_p, flg_I, flg_C};
  1545.   
  1546.   /* mailer parameters */
  1547.   enum mats {mat_path, mat_flags, mat_sender, mat_recipient, mat_argv, 
  1548. --- 54,60 ----
  1549.   /* flag types */
  1550.   enum flgs {flg_f, flg_r, flg_S, flg_n, flg_l, flg_s, flg_m, flg_F, flg_D,
  1551.          flg_M, flg_x, flg_P, flg_u, flg_h, flg_A, flg_U, flg_e, flg_X,
  1552. !        flg_L, flg_p, flg_I, flg_C, flg_E};
  1553.   
  1554.   /* mailer parameters */
  1555.   enum mats {mat_path, mat_flags, mat_sender, mat_recipient, mat_argv, 
  1556. diff -c /dev/null fixstrings.h
  1557. *** /dev/null    Mon Jan 25 16:04:47 1988
  1558. --- fixstrings.h    Thu Aug 13 15:46:27 1987
  1559. ***************
  1560. *** 0 ****
  1561. --- 1,31 ----
  1562. + /*
  1563. +  * $Source: /vax4/usr3/src/local/tc/ease/RCS/fixstrings.h,v $
  1564. +  * $Locker:  $
  1565. +  *
  1566. +  * $Revision: 1.3 $
  1567. +  * Check-in $Date: 87/03/05 19:37:50 $
  1568. +  * $State: Exp $
  1569. +  *
  1570. +  * $Author: jeff $
  1571. +  *
  1572. +  * $Log:    /vax4/usr3/src/local/tc/ease/RCS/fixstrings.h,v $
  1573. +  * Version 1.3  87/03/05  19:37:50  jeff
  1574. +  * Edited RCS header and FLUKEid[] string.
  1575. +  * 
  1576. +  * Version 1.2  87/02/25  16:55:16  jeff
  1577. +  * Add some RCS header lines.  No code changes.
  1578. +  * 
  1579. +  */
  1580. + 
  1581. + /* FLUKE jps 16-apr-86 - revector the string routines to custom-coded ones
  1582. +  *  which handle NULL pointers.
  1583. +  */
  1584. + #define strcat    Xstrcat
  1585. + #define strncat    Xstrncat
  1586. + #define strcmp    Xstrcmp
  1587. + #define strncmp    Xstrncmp
  1588. + #define strcpy    Xstrcpy
  1589. + #define strncpy    Xstrncpy
  1590. + #define strlen    Xstrlen
  1591. + #define index    Xindex
  1592. + #define rindex    Xrindex
  1593. diff -c /dev/null fixstrings.c
  1594. *** /dev/null    Mon Jan 25 16:04:47 1988
  1595. --- fixstrings.c    Thu Aug 13 16:13:13 1987
  1596. ***************
  1597. *** 0 ****
  1598. --- 1,85 ----
  1599. + /*
  1600. +  * $Source: /vax4/usr3/src/local/tc/ease/RCS/fixstrings.c,v $
  1601. +  * $Locker:  $
  1602. +  *
  1603. +  * $Revision: 1.3 $
  1604. +  * Check-in $Date: 87/03/05 19:38:33 $
  1605. +  * $State: Exp $
  1606. +  *
  1607. +  * $Author: jeff $
  1608. +  *
  1609. +  * $Log:    /vax4/usr3/src/local/tc/ease/RCS/fixstrings.c,v $
  1610. +  * Version 1.3  87/03/05  19:38:33  jeff
  1611. +  * Edited RCS header and FLUKEid[] string.
  1612. +  * 
  1613. +  * Version 1.2  87/02/25  16:55:13  jeff
  1614. +  * Add some RCS header lines.  No code changes.
  1615. +  * 
  1616. +  */
  1617. + 
  1618. + /*  FLUKE jps 16-apr-86 - special hacks for NULL pointers.
  1619. +  *
  1620. +  *  The author of ease used a *lot* of NULL pointers.  This isn't much
  1621. +  *  of a problem on a vax, where NULL pointers look like "".  Not so on a Sun.
  1622. +  *
  1623. +  *  We hack around the problem by defining a set of wrappers for the
  1624. +  *  standard string functions, making it appear as though they accept NULL
  1625. +  *  pointers.  In the other C files, cpp macros are used to revector the
  1626. +  *  standard string functions to this file.
  1627. +  */
  1628. + #include <strings.h>
  1629. + #define fix(s) ((s) ? (s) : "")
  1630. + 
  1631. + char *Xstrcat (s1, s2)
  1632. + char *s1, *s2; 
  1633. + {
  1634. +     return (strcat (s1, fix (s2)));
  1635. + }
  1636. + 
  1637. + char *Xstrncat (s1, s2, n)
  1638. + char *s1, *s2; 
  1639. + {
  1640. +     return (strncat (s1, fix (s2), n));
  1641. + }
  1642. + 
  1643. + Xstrcmp (s1, s2)
  1644. + char *s1, *s2; 
  1645. + {
  1646. +     return (strcmp (fix (s1), fix (s2)));
  1647. + }
  1648. + 
  1649. + Xstrncmp (s1, s2, n)
  1650. + char *s1, *s2; 
  1651. + {
  1652. +     return (strncmp (fix (s1), fix (s2), n));
  1653. + }
  1654. + 
  1655. + char *Xstrcpy (s1, s2)
  1656. + char *s1, *s2; 
  1657. + {
  1658. +     return (strcpy (s1, fix (s2)));
  1659. + }
  1660. + 
  1661. + char *Xstrncpy (s1, s2, n)
  1662. + char *s1, *s2; 
  1663. + {
  1664. +     return (strncpy (s1, fix (s2), n));
  1665. + }
  1666. + 
  1667. + Xstrlen (s)
  1668. + char *s; 
  1669. + {
  1670. +     return (strlen (fix (s)));
  1671. + }
  1672. + 
  1673. + char *Xindex (s, c)
  1674. + char *s, c; 
  1675. + {
  1676. +     return (index (fix (s), c));
  1677. + }
  1678. + 
  1679. + char *Xrindex (s, c)
  1680. + char *s, c; 
  1681. + {
  1682. +     return (rindex (fix (s), c));
  1683. + }
  1684. Howard_The_Duck
  1685. fi # end of overwriting check
  1686. echo shar: extracting "'local.shar'" '(3624 characters)'
  1687. if test -f 'local.shar'
  1688. then
  1689.     echo shar: will not over-write existing file "'local.shar'"
  1690. else
  1691. cat << \Howard_The_Duck > 'local.shar'
  1692. #! /bin/sh
  1693. # This is a shell archive, meaning:
  1694. # 1. Remove everything above the #! /bin/sh line.
  1695. # 2. Save the resulting text in a file.
  1696. # 3. Execute the file with /bin/sh (not csh) to create the files:
  1697. #    Makefile
  1698. #    ease.1
  1699. #    ease.ksh
  1700. #    ease.sh
  1701. # This archive created: Wed Dec 23 11:59:29 1987
  1702. export PATH; PATH=/bin:$PATH
  1703. echo shar: extracting "'Makefile'" '(260 characters)'
  1704. if test -f 'Makefile'
  1705. then
  1706.     echo shar: will not over-write existing file "'Makefile'"
  1707. else
  1708. cat << \SHAR_EOF > 'Makefile'
  1709. # Makefile for 'ease'
  1710. #
  1711.  
  1712. EASE_SH= ease.ksh
  1713. #EASE_SH= ease.sh
  1714.  
  1715. install: ../src/et $(EASE_SH)
  1716.     install -c -s ../src/et /usr/local/lib
  1717.     cp $(EASE_SH) /usr/local/bin/ease
  1718.     chmod 755 /usr/local/bin/ease
  1719.     cp ease.1 /usr/man/manl/ease.l
  1720.  
  1721. ../src/et:
  1722.     cd ../src ; make
  1723. SHAR_EOF
  1724. fi # end of overwriting check
  1725. echo shar: extracting "'ease.1'" '(788 characters)'
  1726. if test -f 'ease.1'
  1727. then
  1728.     echo shar: will not over-write existing file "'ease.1'"
  1729. else
  1730. cat << \SHAR_EOF > 'ease.1'
  1731. .TH EASE 1 local
  1732. .SH NAME
  1733. ease \- build sendmail configuration files from readable descriptions
  1734. .SH SYNOPSIS
  1735. .B ease
  1736. [
  1737. .I cpp
  1738. options ]
  1739. [ input_file ...  ] [
  1740. .B \-o
  1741. output_file ]
  1742. .SH DESCRIPTION
  1743. .I Ease
  1744. is a simple shell script that
  1745. runs the C preprocessor, piping the output into the Ease Translator.
  1746. .PP
  1747. If the
  1748. .B \-o
  1749. option is given, the named file will be used for the generated
  1750. configuration information, otherwise the standard output is used.
  1751. .PP
  1752. By default,
  1753. .I ease
  1754. will read and write the standard input and output.
  1755. .SH FILES
  1756. /lib/cpp
  1757. .br
  1758. /usr/local/lib/et
  1759. .SH SEE ALSO
  1760. .I "Ease: A Configuration Language for Sendmail"
  1761. by James S. Schoner,
  1762. published in the January/February 1986 Usenix
  1763. .IR ;login: .
  1764. .SH DIAGNOSTICS
  1765. A simple usage message if inappropriate arguments are supplied.
  1766. SHAR_EOF
  1767. fi # end of overwriting check
  1768. echo shar: extracting "'ease.ksh'" '(694 characters)'
  1769. if test -f 'ease.ksh'
  1770. then
  1771.     echo shar: will not over-write existing file "'ease.ksh'"
  1772. else
  1773. cat << \SHAR_EOF > 'ease.ksh'
  1774. #! /bin/ksh
  1775.  
  1776. # ease -- run /lib/cpp and send the output into the ease translator
  1777. #
  1778. # usage: ease [ cpp options ] [ input files ] [ -o output_file ]
  1779.  
  1780. PATH=/bin:/usr/ucb:/usr/bin
  1781. export PATH
  1782.  
  1783. function usage
  1784. {
  1785.     echo usage: ease [ cpp options ] [ input files ] [ -o output_file ] 1>&2
  1786.     exit 1
  1787. }
  1788.  
  1789. ifiles=
  1790. ofile=
  1791. opts=
  1792.  
  1793. while [ $# -gt 0 ]
  1794. do
  1795.     case "$1" in
  1796.     -o)    if [ "$2" ]
  1797.         then
  1798.             ofile="$2"
  1799.             shift
  1800.         else
  1801.             usage
  1802.         fi
  1803.         ;;
  1804.     -o?*)    ofile="${1#-o}" ;;
  1805.     -?*)    opts="$opts $1" ;;    # probably -D or -I cpp options
  1806.     *)    ifiles="$ifiles $1" ;;    # will catch plain "-"
  1807.     esac
  1808.     shift
  1809. done
  1810.  
  1811. # use cat, since it understands the "-" convention
  1812.  
  1813. cat $ifiles | /lib/cpp $opts | cat -s | /usr/local/lib/et - $ofile
  1814. SHAR_EOF
  1815. fi # end of overwriting check
  1816. echo shar: extracting "'ease.sh'" '(686 characters)'
  1817. if test -f 'ease.sh'
  1818. then
  1819.     echo shar: will not over-write existing file "'ease.sh'"
  1820. else
  1821. cat << \SHAR_EOF > 'ease.sh'
  1822. #! /bin/sh
  1823.  
  1824. # ease -- run /lib/cpp and send the output into the ease translator
  1825. #
  1826. # usage: ease [ cpp options ] [ input files ] [ -o output_file ]
  1827.  
  1828. PATH=/bin:/usr/ucb:/usr/bin
  1829. export PATH
  1830.  
  1831. ifiles=
  1832. ofile=
  1833. opts=
  1834.  
  1835. while [ $# -gt 0 ]
  1836. do
  1837.     case "$1" in
  1838.     -o)    if [ "$2" ]
  1839.         then
  1840.             ofile="$2"
  1841.             shift
  1842.         else
  1843.             echo "usage: ease [ cpp options ] [ input files ] [ -o output_file ]" 1>&2
  1844.             exit 1
  1845.         fi
  1846.         ;;
  1847.     -o?*)    ofile="`expr $1 : '-o\(..*\)'`" ;;
  1848.     -?*)    opts="$opts $1" ;;    # probably -D or -I cpp options
  1849.     *)    ifiles="$ifiles $1" ;;    # will catch plain "-"
  1850.     esac
  1851.     shift
  1852. done
  1853.  
  1854. # use cat, since it understands the "-" convention
  1855.  
  1856. cat $ifiles | /lib/cpp $opts | cat -s | /usr/local/lib/et - $ofile
  1857. SHAR_EOF
  1858. fi # end of overwriting check
  1859. #    End of shell archive
  1860. exit 0
  1861. Howard_The_Duck
  1862. fi # end of overwriting check
  1863. #    End of shell archive
  1864. exit 0
  1865.  
  1866.  
  1867.